﻿Public Class frmAddTask

    Private Sub cmdOK_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles cmdOK.Click
        If optShortcut.Checked Then
            frmShortcut.ShowDialog()
        ElseIf optRunProgram.Checked Then
            frmRun.ShowDialog()
        ElseIf optDelete.Checked Then
            frmDelete.ShowDialog()
        Else
            frmVariables.ShowDialog()
        End If
        Me.Close()
    End Sub
End Class